home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 9
/
FM Towns Free Software Collection 9.iso
/
t_os
/
tool
/
ugoku
/
src
/
vdsys
/
vdsysx.c
< prev
next >
Wrap
Text File
|
1994-11-16
|
5KB
|
195 lines
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <winb.h>
#include <te.h>
#include <fntb.h>
#include <gui.h>
#include <file_dlg.h>
#include <egb.h>
#include <mos.h>
#include <snd.h>
#include <guidbg.h>
#include "ugoku.h"
char *guiEgbPtr ; /* EGB のワークアドレス */
char guiSndPtr[16*1024] ; /* SND のワークアドレス */
void main( ac, av )
char ac,*av[];
{
extern int APL_init() ;
extern int initV02Table( char, char **, int, char * ) ;
extern int mouseDsp( int ) ; /* マウス表示関数 */
MMICTRL ctrl ;
/* 致命的エラーハンドラの登録 */
FM_SetVector() ;
/* サウンドの初期化 */
SND_init(guiSndPtr) ;
/* 初期化処理 */
ctrl.page0 = 3 ;
ctrl.page1 = 10 ;
ctrl.writePage = 0 ;
ctrl.displayPage = 3 ;
ctrl.priority = 0 ;
ctrl.mode = 0 ;
ctrl.width = 512 ;
ctrl.size = 0 ;
ctrl.ptr = NULL ;
ctrl.asize = 0 ;
ctrl.aptr = NULL ;
ctrl.fr.lupx = 0 ;
ctrl.fr.lupy = 0 ;
ctrl.fr.rdwx = 639 ;
ctrl.fr.rdwy = 479 ;
ctrl.move.lupx = 0 ;
ctrl.move.lupy = 20 ; /* ダイアログの移動範囲に制限を付ける(y座標) */
ctrl.move.rdwx = 639 ;
ctrl.move.rdwy = 479 ;
ctrl.white = 15 ;
ctrl.black = 8 ; /* パレット変更に伴いGUIの表示色を変更(黒) */
ctrl.gray = 7 ; /* 〃 (灰色) */
ctrl.xor = 7 ; /* 〃 (反転色) */
if (MMI_Open( &ctrl ) == NOERR)
{
/* 初期化に成功すればメインループに入る. */
if (APL_init() == NOERR)
{
FDG_SaveCurDir() ; /* カレントディレクトリ保存 */
FDG_InitFileDlg() ; /* ファイルダイアログ初期化 */
mouseDsp( 80 ) ; /* マウス表示関数 */
if( ac > 0 )
{
initV02Table( ac, av, 6, av[0] ) ; /* v02table setting */
MMI_ExecSystem() ; /* メインのイベントループ */
}
FDG_FreeFileDlg() ; /* ファイルダイアログ終了処理 */
FDG_RecovCurDir() ; /* カレントディレクトリ復元 */
}
MMI_SendMessage( MMI_GetBaseObj(), MM_ERASE, 0 ) ;
}
/* 終了処理 */
MMI_Close() ;
/* サウンドの終了 */
SND_end() ;
/* 致命的エラーハンドラの復帰 */
FM_ResetVector() ;
}
int APL_init()
{
extern int setPalette( char * ) ; /* パレット設定関数 */
extern int mouseDsp( int ) ; /* マウス表示関数 */
extern int mItemId[] ;
extern MMIINIT initDataIVDDSK ;
extern MMIINIT initDataIVDABOU ;
extern MMIINIT initDataIVDERR ;
extern MMIINIT initDataIVDREC ;
extern MMIINIT initDataIVDORG ;
extern MMIINIT initDataIVDPAC ;
extern MMIINIT initDataIVDPLY ;
extern MMIINIT initDataIVDEDT ;
register int ret ;
/* EGB ワークアドレスの取得. */
guiEgbPtr = MMI_GetEgbPtr() ;
/* ハイパ型部品の初期化 */
if ((ret = MMI_initHyper()) < 0)
return ret ;
/* ダイアログ型部品の初期化 */
if ((ret = MMI_initDialogL40()) < 0)
return ret ;
/* アラート型部品の初期化 */
if ((ret = MMI_initAlertL40()) < 0)
return ret ;
/* メッセージ型部品の初期化 */
if ((ret = MMI_initMessageL40()) < 0)
return ret ;
/* メニュー型部品の初期化 */
if ((ret = MMI_initMenuL40()) < 0)
return ret ;
/* ボタン型部品の初期化 */
if ((ret = MMI_initButtonL40()) < 0)
return ret ;
/* ドロウボタン型部品の初期化 */
if ((ret = MMI_initDrawButtonL40()) < 0)
return ret ;
/* アイコンボタン型部品の初期化 */
if ((ret = MMI_initIconL40()) < 0)
return ret ;
/* トグルアイコン型部品の初期化 */
if ((ret = MMI_initToggleIconL40()) < 0)
return ret ;
/* メニューアイテム型部品の初期化 */
if ((ret = MMI_initMenuItemL40()) < 0)
return ret ;
/* スクロール型部品の初期化 */
if ((ret = MMI_initScrollBarL40()) < 0)
return ret ;
/* テキスト型部品の初期化 */
if ((ret = MMI_initTextL40()) < 0)
return ret ;
/* リストメニュー型部品の初期化 */
if ((ret = MMI_initListMenuL40()) < 0)
return ret ;
/* 数値入力型部品の初期化 */
if ((ret = MMI_initNumBoxL40()) < 0)
return ret ;
/* パレット変更・・・・2画面使用の影響を受けるため */
ret = setPalette( guiEgbPtr ) ;
/* マウスカーソル表示関数の変更・・・・2画面使用の影響を受けるため */
MMI_SetPtrFunc( mouseDsp ) ;
/* 背景データの初期化 */
/* データの登録 */
if ((ret = MMI_Init(&initDataIVDDSK)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDABOU)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDERR)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDREC)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDORG)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDPAC)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDPLY)) < 0)
return ret ;
if ((ret = MMI_Init(&initDataIVDEDT)) < 0)
return ret ;
/* SIDEWORKメニューの登録 */
ret = MMI_SetUpSDKMenu( mItemId[0], 2 ) ;
/* 背景を表示する */
MMI_SendMessage(MMI_GetBaseObj(), MM_SHOW, 0) ;
return NOERR ;
}